!$C:\VFP\COM+\TRANSACTIONS\FOXTXN.PJXX$C:\VFP\COM+\TRANSACTIONS\FOXTXN.PJXX c:\vfp\com+\transactionsc:\vfp\com+\transactionsmsmq.h.hviper.h&foxtxn.h6gx( ..\..\msmq.h>h& products.scxcustorder.scxctcontext.s msmqmsg.prgc CUSTORDERWEBfAPRODARRa CUSTORDERf PROCESSORDERfERRORforderC order.prgORDERP 4 116 38{9C976C54-EA5B-ESENDMSGfAPRODS ERRORfmsmqmsgC msmqmsg.prgMSMQMSGPTESTDATAdVIPER.HT"ERRORfCLICKfPRODUCTSKBEFOREOPENTABLESf PROCESSTRANSf APRODUCTSaENDTRANSf ABORTTRANSf CLEARTRANSfADDORDERf NEWCUSTTRANSf KILLCUSTTRANSfFINISHf REPORTERRORf QUERYUNLOADfINITfDESTROYfINTERACTIVECHANGEfCLICKfERRORf CUSTORDERKJECTCONfoxtxn.h^jx( testdata.dbc.dbc order.prg cust.prg prod.prgfoxtxn.h'x(foxtxn.h'x(MSMQ.HT#)TV CHECKCUSTfACUSTAMTaERRORfAPRODARRfAPRODSfcustCcust.prgCUSTPC CHECKSTOCKf APRODSTOCKaERRORfprodCprod.prgPRODPn 4 103 4 4 35C:\vfp\COM+\Transactions\foxtxn.dll 8foxviper 8foxviper 21foxviper Type Library 4 116 38{9C976C54-EA5B-11D2-A74F-000000000000} 10 13foxviper.cust 13foxviper.cust 0 4cust 33c:\vfp\com+\transactions\cust.prg 12 38{A4383D5A-00F1-11D3-A767-0080C73669A1} 38{A4383D5B-00F1-11D3-A767-0080C73669A1} 10 16foxviper.msmqmsg 16foxviper.msmqmsg 0 7msmqmsg 36c:\vfp\com+\transactions\msmqmsg.prg 12 38{A4383D5F-00F1-11D3-A767-0080C73669A1} 38{A4383D60-00F1-11D3-A767-0080C73669A1} 10 14foxviper.order 14foxviper.order 0 5order 34c:\vfp\com+\transactions\order.prg 12 38{A4383D58-00F1-11D3-A767-0080C73669A1} 38{A4383D59-00F1-11D3-A767-0080C73669A1} 10 13foxviper.prod 13foxviper.prod 0 4prod 33c:\vfp\com+\transactions\prod.prg 12 38{A4383D5C-00F1-11D3-A767-0080C73669A1} 38{A4383D5D-00F1-11D3-A767-0080C73669A1}1} N˟%407(,U  T!TCMTXAS.APPSERVER.1NTC%C B;TCCꖡ)C!c:\vfp\COM+\Transactions\testdata % ,!c:\vfp\COM+\Transactions\testdataTC *ocustomer C fC f HQ& oT  T  T2&+pcustomer   %  T"T% J C_ C% w T T B UCCUSTID NORDAMOUNTNBALANCEACUSTAMTNERRCODEOMTXOCONTEXTLDATANOTOPENEDGETOBJECTCONTEXT MAXORDAMTCUSTOMERCUST_IDTHIS NMINAMOUNT SETCOMPLETESETABORTGCError in Cust: C_,C_C C  c:\mts1.txta,C CEC C  c:\mts1.txta BUNERRORCMETHODNLINEUU CheckCust,Error{aprodarr&aprods-%T  U NMINAMOUNTcustsessionx7rAAAAA2AQA4q6116T +?0 I1J2=c:\docume~1\randybr\locals~1\temp\cust.fxpc:\vfp\com+\transactions\cust.prg)# $  P%t 2 T (-U TTCgT Cg T T%TC T T  H #TTransaction succeeded. TـTransaction failed. Customer does not have enough Maxordamt for this order. The minimum balance for a customer account is $5000.  HT;Transaction failed. Check for not enough quantity in stock. U4T'Transaction failed. Customer not found. 0T#Transaction failed. Item not found.2JT=Transaction failed. Possible error accessing SQL Server data.B



U LCCUSTIDLCPRODLNQTYNERRLNTOTALCERRAPRODARRNBALANCENTIMEOUTTHIS PROCESSORDEROCONTEXTOMTXq%TCTT  BU CCUSTIDNTOTALNBALANCEAPRODARRNTIMEOUTNERRTHIS PROCESSORDEROCONTEXTOMTX  $T CMTXAS.APPSERVER.1NT C ;T CCꖡ)C!c:\vfp\COM+\Transactions\testdata % ,!c:\vfp\COM+\Transactions\testdata'T Cfoxviper.msmqmsg T C $TC foxviper.cust TC/TCC m.nErrCodebN 6%   B $TC foxviper.prod (C+TCC C /TCC m.nErrCodebN 6% !%    B UCCUSTIDNTOTALNBALANCEAPRODARRNTIMEOUTOPRODOCUSTINERRCODELDATANOTOPENEDOMSMQTHISOMTXOCONTEXTGETOBJECTCONTEXTCREATEINSTANCESENDMSG CHECKCUSTSETABORT CHECKSTOCK SETCOMPLETEHCError in Order: C_,C_C C  c:\mts1.txta,C CEC C  c:\mts1.txta BUNERRORCMETHODNLINE CustOrderWeb, CustOrder ProcessOrderzerror%A T- T-    UOMTXOCONTEXTordersession 811Q1Qa11AAAAAA3qqQa4qBqAsC3AC2AAA2A336^,$%"S .F` % ]K>0 c:\docume~1\randybr\locals~1\temp\order.fxpc:\vfp\com+\transactions\order.prg) # T%^)(/U!TCMTXAS.APPSERVER.1NT C %C q B"TCmsmq.msmqqueueinfoN%CO6T DIRECT=OS:.\PRIVATE$\ FoxViperQueueTC %C  TCmsmq.msmqmessageN%TViper message: CC_KTOrder detail: Customer -  , Amount - C_C C &T Products:C C (C2ST ID - CC  , Amount - CC _C C T%zTT C  C UCCUSTIDNTOTALAPRODS OQUEUEINFOOMSG OSENDQUEUELCSTRIOMTXOCONTEXTGETOBJECTCONTEXT FORMATNAMEOPENISOPENLABELBODYTHISNTIMEOUTJOURNALMAXTIMETORECEIVESENDCLOSE SETCOMPLETEGCError in MSMQ: C_,C_C C  c:\mts1.txta,C CEC C  c:\mts1.txta BUNERRORCMETHODNLINESendMsg,Error$ T  UNTIMEOUTmsmqmsgsession~8qA#Qaq1Qa1AAABAA3q3@6cT,$Q_c:\docume~1\randybr\locals~1\temp\msmqmsg.fxpc:\vfp\com+\transactions\msmqmsg.prg)#l SNy%%1:(,UU   T;TCCꖡ)C!c:\vfp\COM+\Transactions\testdata % ,!c:\vfp\COM+\Transactions\testdata!TCMTXAS.APPSERVER.1NTC%C B.oproductsCC fCC f H@ ^T  T23pproducts CC fCC f% T%  C  C  T T% C B U CPID NORDAMOUNT APRODSTOCKNERRCODEOMTXOCONTEXTLDATANOTOPENEDGETOBJECTCONTEXTIN_STOCKPRODUCTS PRODUCT_ID SETCOMPLETESETABORTGCError in Prod: C_,C_C C  c:\mts1.txta,C CEC C  c:\mts1.txta BUNERRORCMETHODNLINE CheckStock,Error- T- T-  UOMTXOCONTEXTprodsession9rAA13AA2AQA4q3 6_&_;+?jc:\docume~1\randybr\locals~1\temp\prod.fxpc:\vfp\com+\transactions\prod.prg)# foxtxn.hFOXTXN.HT